home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / COMAL / Z-Misc Series / (k)zn.d64 / proc.graph'init < prev    next >
Text File  |  2007-03-01  |  269b  |  12 lines
  1. 0010 ╨╥╧├ GRAPH'INIT 
  2. 0020   // ALTER MAX AND COLOURS TO SUIT
  3. 0030   MAX:=20
  4. 0040   ╒╙┼ GRAPHICS
  5. 0050   BORDER(3)
  6. 0060   BACKGROUND(1)
  7. 0070   PENCOLOR(6)
  8. 0080   GRAPHICSCREEN(0)
  9. 0090   ─╔═ VALUES(0:MAX,1:2), SCALE(3,2), LABELS$(0:2) ╧╞ 30
  10. 0100 ┼╬─╨╥╧├ GRAPH'INIT
  11. 0110 
  12.